home *** CD-ROM | disk | FTP | other *** search
/ Aminet 23 / Aminet 23 (1998)(GTI - Schatztruhe)[!][Feb 1998].iso / Aminet / game / role / fGRAAL2B.lha / 3.room < prev    next >
Text File  |  1997-10-25  |  10KB  |  248 lines
  1. /* Port de Constantinople
  2. /*
  3. /*                                   3.room
  4. /*
  5. /*                          Le port dans Byzance
  6. /*
  7. /* RF usage: 1=seagull status, 2=number of times spoken to captain
  8. /*           3=captain has received gift, 6=weather, 4=shop sign status
  9. /*           5=dictionary/captain combo. 7=Which shop sign is actually out?
  10.  
  11. SECTION: 1
  12.  
  13. UPDATE: 6;2
  14.  
  15. BACKDROP: 3BG.IFF
  16.  
  17. START_POS: 1;//13;455;104;R;1
  18. START_POS: 2;13;70;76;L;1
  19.  
  20. FLOOR: 1;81;76;120;120;1-1/2-2/3-2/4-4
  21. FLOOR: 2;0;90;480;120;1-1/2-2/3-3/4-4
  22. FLOOR: 3;180;76;480;120;1-2/2-2/3-3/4-2
  23. FLOOR: 4;0;82;120;120;1-1/2-2/3-2/4-4
  24.  
  25. EXIT: 1;450;50;480;120;472;99;la\ville
  26. EXIT: 2;60;37;68;74;64;76;remise\délabrée
  27.  
  28. CLPART: 3FG.IFF
  29.  
  30. /* 1 is ship
  31. ROOMBOBS: 1;1;0;0;193;73;0;0
  32. /* 2 is a fishing net
  33. ROOMBOBS: 1;2;194;0;38;24;0;0
  34. /* 3 is some reflections in the water
  35. /* ROOMBOBS: 3;4;75;168;85;0
  36. /* 4-8 is captain walking (4 is standing sideways)
  37. ROOMBOBS: 5;4;5;93;15;36;16;0
  38. /* 9-10 is captain bending down doing something
  39. ROOMBOBS: 2;9;4;132;30;22;30;0
  40. /* 11-16 is captain loosing hat
  41. ROOMBOBS: 6;11;64;132;28;22;30;0
  42. /* 17 is gangplank
  43. ROOMBOBS: 1;17;196;30;31;16;0;0
  44. /* 18 is beam and sail
  45. ROOMBOBS: 1;18;238;0;68;62;0;72
  46. /* 19-21 are arabic "sentences"
  47. ROOMBOBS: 1;19;5;159;56;20;0;0
  48. ROOMBOBS: 1;20;60;157;61;21;0;0
  49. ROOMBOBS: 1;21;125;157;51;21;0;0
  50. /* 22-23 is captain talking
  51. ROOMBOBS: 2;22;85;93;15;36;16;0
  52. /* 24 is captain facing forward.
  53. ROOMBOBS: 1;24;116;93;16;36;0;0
  54. /* 25 is horizon
  55. ROOMBOBS: 1;25;3;183;171;9;0;-30
  56. /* 26-27 are shop signs
  57. ROOMBOBS: 1;26;197;54;36;15;0;0
  58. ROOMBOBS: 1;27;197;69;23;15;0;0
  59. /* 28 Captain stretching out hand.
  60. ROOMBOBS: 1;28;132;93;16;36;0;0
  61. /* 29 Feather
  62. ROOMBOBS: 1;29;3;193;9;7;0;0
  63. /* 30 Captain securing hat
  64. ROOMBOBS: 1;30;148;93;16;36;0;0
  65. /* 31-33 Olaf using net
  66. ROOMBOBS: 3;31;15;194;22;38;22;0
  67. /* 34-35 Seagull sitting down
  68. ROOMBOBS: 2;34;84;196;13;9;15;0
  69. /* 36-38; Seagull in flight
  70. ROOMBOBS: 3;36;115;196;18;8;20;0
  71. /* 39-42 Olaf waving knife
  72. ROOMBOBS: 4;39;173;192;33;41;31;0
  73. /* 43-44 Captain hitting
  74. ROOMBOBS: 2;43;165;93;15;36;16;0
  75. /* 45-46 Sales signs
  76. ROOMBOBS: 2;45;237;67;19;28;20;0
  77. /* 52 Olaf talks!
  78. ROOMBOBS: 1;52;184;159;77;20;0;0
  79. /* 53 Cargo 1
  80. ROOMBOBS: 1;53;257;112;32;25;0;0
  81. /* 54 Cargo 2
  82. ROOMBOBS: 1;54;88;210;81;27;0;0
  83.  
  84.  
  85. CLPART: Olaf_Extras.IFF
  86.  
  87. /* 47-51 Olaf getting hit
  88. ROOMBOBS: 5;47;130;2;31;47;32;0
  89.  
  90.  
  91. ROOMOBJ: 1;bateau;3;-1;59;RBOB1;327;71;80;5;//14; ;0;0;8;0;MID;WD;un;ce;ca
  92. ROOMOBJ: 2;horizon;3;-1;56;RBOB25;162;2;-45;40;12; ;0;0;8;0;HIGH;-;un;ce;ca
  93. ROOMOBJ: 3;panneau;3;-1;55;RBOB26;25;32;0;30;12; ;0;0;8;0;HIGH;WD;un;ce;ca
  94. ROOMOBJ: 4;panneau;3;-1;54;RBOB27;84;44;00;30;12; ;0;0;8;0;HIGH;WD;un;ce;ca
  95. ROOMOBJ: 5;mouette;3;VIS;52;A 0,(RBOB35,100)(RBOB34,50)(RBOB35,200)(RBOB34,25);152;61;0;40;12; ;0;8;8;0;MID;AV;une;cette;elle
  96. ROOMOBJ: 6;panneau\ventes;3;0;51;RBOB45;84;74;0;15;12; ;0;0;8;0;MID;WD;un;ce;ca
  97.  
  98.  
  99. STATIC: 40;RBOB17;309;73
  100. STATIC: 41;RBOB18;316;72
  101. STATIC: 37;RBOB53;285;121
  102. STATIC: 38;RBOB54;196;122
  103.  
  104.  
  105.  
  106. /* This room uses the command area
  107. /*
  108. DACT: SETRF 40,2=0
  109. /*
  110. /* Display proper sales sign. See also DACTs in 2.room!
  111. DACT: IFRF 7=1;SHOW ROBJ6,84,74,DEF
  112. DACT: IFRF 7=2;SHOW ROBJ6,84,74,RBOB46
  113. /* Add Rajah question to bartender dialogue
  114. DACT: OBJ1 5;SETOF 2=1;OBJ1
  115. /* Captain's hat problem status
  116. DACT: IFRF 3=1;SHOW 15,244,58,PTRN 2
  117. /* Show seagull on pollard
  118. DACT: IFRF 1=0;SHOW ROBJ5,152,61,DEF
  119. /* Show seagull on roof, make more floor space available
  120. DACT: IFRF 1=1;SHOW ROBJ5,50,27,DEF;FLOOR 1,61,76,480,120,1-1/2-2;FLOOR 2,0,82,480,120,1-1/2-2;NFLOOR 2
  121. /* If Byzantium puzzle is solved, the ship and captain is gone!
  122. DACT: IFRF 2,4=4;HIDE ROBJ1;BOBOFF 40;BOBOFF 41;HIDE 15
  123. /* Check the weather
  124. DACT: IFRF 6=1;COLOUR DLY,29,$678;COLOUR DLY,31,$555;COLOUR DLY,24,$555;COLOUR DLY,25,$666;COLOUR DLY,26,$666;COLOUR DLY,27,$777;COLOUR DLY,28,$777
  125. /* MUSIC!
  126. DACT: TRACK seagulls.track,125,FILTER
  127. /* Restore command area if we came back from shop
  128. DACT: IFSPOS 2;COMAREA ON
  129. /*
  130. DACT: LIGHTS ON
  131.  
  132. /* Captain dialogue
  133. LINE: 3;1;Oh, oubliez ça! Attendez que je trouve un dictionnaire, d'accord?;Il va falloir essayer autre chose.; 
  134. LACT: 3;1;BOBON 42,330,44,RBOB21;RESP S,3,          ;BOBOFF 42;CUTSCENE 3,H;SETOF 1=1
  135. LACT: 3;1;SETRF 4,3=1;EDLG
  136. /*
  137. LINE: 3;2;Pareil pour toi!; ; 
  138. LACT: 3;2;BOBON 42,330,44,RBOB20;RESP S,3,          ;SHOW 15,330,84,RBOB4;BOBOFF 42
  139. LACT: 3;2;ADDOF 2;IFOF 2=3;DSET 3,+1,N2;EXIT
  140. LACT: 3;2;DSET 3,N2
  141. /*
  142. LINE: 3;3;Joli bateau que vous avez là.; ; 
  143. LACT: 3;3;BOBON 42,330,44,RBOB21;RESP S,3,          ;SHOW 15,330,84,RBOB4;BOBOFF 42
  144. LACT: 3;3;ADDOF 2;IFOF 2=3;DSET 3,+1,N3;EXIT
  145. LACT: 3;3;DSET 3,N3
  146. /*
  147. LINE: 3;4;Ce bateau est-il à louer?; ; 
  148. LACT: 3;4;BOBON 42,330,44,RBOB19;RESP S,3,          ;SHOW 15,330,84,RBOB4;BOBOFF 42
  149. LACT: 3;4;ADDOF 2;IFOF 2=3;DSET 3,+1,N4;EXIT
  150. LACT: 3;4;DSET 3,N4
  151. /*
  152. LINE: 3;5;Avez-vous un bon truc contre les mouettes?; ; 
  153. LACT: 3;5;BOBON 42,330,44,RBOB19;RESP S,3,          ;SHOW 15,330,84,RBOB4;BOBOFF 42
  154. LACT: 3;5;ADDOF 2;IFOF 2=3;DSET 3,+1,N5;EXIT
  155. LACT: 3;5;DSET 3,N5
  156.  
  157.  
  158. /*
  159. /* Action 0 - Exit
  160. /* ===============
  161. /*
  162. ACTION: 0;IFOBJ 1;MEXIT;GOTO 2,2
  163. ACTION: 0;IFOBJ 2;MEXIT;COMAREA OFF;GOTO 4,1
  164. /*
  165. /* Action 1 - Give
  166. /* ===============
  167. /*
  168. ACTION: 1;IFOBJ 14;IFOBJ2 15;SAY Je suis presque sur que\ce n'est pas un bateau de peche;EXIT
  169. ACTION: 1;IFOBJ2 ROBJ5;SAY Si je voulais quelque chose à moi, il y a longtemps que je l'aurais;EXIT
  170. ACTION: 1;IFOBJ SOBJ4;IFOBJ2 15;SAY Ca ne peut pas marcher!;SAY Ho, trés bien, allons y...;CUTSCENE 2,F;CUTSCENE 7,F;CUTSCENE 8,S;SETRF 3=1;EXIT
  171. ACTION: 1;IFOBJ2 15;IFRF 3=1;SAY Ca sufit maintenant.;SAY Je ne fais pas dans la charité.;EXIT
  172. /* Another try to get feather from beneath seagull here. Handle like USE.
  173. ACTION: 1;IFOBJ 21;IFRF 1=0;VERB 3;REDO
  174. /* Trying out a few good ideas for gifts to the captain below.
  175. ACTION: 1;IFOBJ 21;IFOBJ2 15;SAY Oui, peut etre qu'il pourra mettre la plume dans son chapeau!
  176. ACTION: 1;IFOBJ 30;IFOBJ2 15;SAY OK. avec ces problemes linguistiques, ca vaut le coup!
  177. ACTION: 1;IFOBJ 21|30;IFOBJ2 15;CUTSCENE 2,F;CUTSCENE 9,F;CUTSCENE 3,S;CBOB 11;SAY Ca ne m'aide pas vraiment...;EXIT
  178. /*
  179. /* Action 2- Pick up
  180. /* =================
  181. /*
  182. ACTION: 2;IFOBJ 14;IFOF 1=0;MOBJ;HANDLE;W 25;HANDLE -1;SAY Je ne peux pas - Le filet est accroché à ces crochets!;EXIT
  183. ACTION: 2;IFOBJ 21;IFRF 1=0;SAY Pas tant que cette mouette est assise là!;EXIT
  184. ACTION: 2;IFOBJ ROBJ5;SAY Quoi, comme ca? vous n'avez pas vu ce bec??;EXIT
  185. /*
  186. /* Action 3 - Use
  187. /* ==============
  188. /*
  189. ACTION: 3;IFOBJ ROBJ1;IFOF 15,1=0;SAY Je pense que quelqu'un serait trés énervé si je faisait ça! - surtout sans demander!;EXIT
  190. ACTION: 3;IFOBJ ROBJ1;IFOF 15,1=1;SAY Je ne crois pas avoir persuadé le capitaine. Et vous?;EXIT
  191. ACTION: 3;IFOBJ 14;IFOBJ2 15;SAY Peut-etre si j'étais plus fort... et un peu moins désperé.;EXIT
  192. ACTION: 3;IFOBJ 14;IFOBJ2 ROBJ5;IFRF 1=0;IFOF 1=0;VERB 2;OBJ2 0;REDO
  193. ACTION: 3;IFOBJ 14;IFOBJ2 ROBJ5;IFRF 1=0;IFOF 1=1;IFNOTCARR;MOBJ;HANDLE;PICK;SOUND 1;HANDLE -1
  194. ACTION: 3;IFOBJ 14;IFOBJ2 ROBJ5;IFRF 1=0;IFOF 1=1;CUTSCENE 4,S;EXIT
  195. ACTION: 3;IFOBJ 14;IFOBJ2 ROBJ5;IFRF 1=1;SAY Il est hors d'atteinte.;EXIT
  196. ACTION: 3;IFOBJ 21;IFRF 1=0;SAY Je dois mettre mes mains dessus d'abord.;EXIT
  197. ACTION: 3;IFOBJ 24;IFRF 1=0;IFOBJ2 ROBJ5;CUTSCENE 6,S;EXIT
  198. ACTION: 3;IFOBJ2 ROBJ5;SAY Je ne jetterai rien là dessus qui pourrait me servir plus tard. L'eau est trop proche.;EXIT
  199. ACTION: 3;IFOBJ ROBJ5;SAY Je ne peux pas mettre mes mains dessus. Et si je le pouvais, que suggerez vous? du ragout de mouette?;EXIT
  200. ACTION: 3;IFOBJ 24;IFOBJ2 14;IFOF2 1=0;MOBJ 14;HANDLE;W 30;HANDLE -1;SETOF 14,1=1;SAY Voilà - je crois que c'est fichu, maintenant.;EXIT
  201. ACTION: 3;IFOBJ 24;IFOBJ2 14;IFOF2 1=0;SAY Je ne pense pas que le #OBJ1 soit le bon outil pour ça.;EXIT
  202. ACTION: 3;IFOBJ 30;IFOBJ2 15;VERB 5;OBJ1 15;REDO
  203. /*
  204. /* Action 4 - Open
  205. /* ===============
  206. /*
  207. /*
  208. /* Action 5 - Talk to
  209. /* ==================
  210. /*
  211. ACTION: 5;IFOBJ 15;IFRF 3=1;SAY Non, j'en ai eu assez!;EXIT
  212. ACTION: 5;IFOBJ 15;IFRF 5=1;SAY NON, plus maintenant!;EXIT
  213. ACTION: 5;IFOBJ 15;IFCARR 30;CUTSCENE 13,S;SETRF 5=1;EXIT
  214. ACTION: 5;IFOBJ 15;CUTSCENE 2,H;BOBON 42,330,44,RBOB19;RESP S,3,            ;SHOW 15,330,84,RBOB4;BOBOFF 42
  215. ACTION: 5;IFOBJ 15;IFOF 2=0;DSET 3,+2,+3,+4,+5;EXIT
  216. ACTION: 5;IFOBJ 15;DSET 3,+1;EXIT
  217. ACTION: 5;IFOBJ ROBJ5;SAY Je ne pense pas que l'on soit en bon terme!;EXIT
  218. /*
  219. /* Action 6 - Push
  220. /* ===============
  221. /*
  222. ACTION: 6;IFOBJ ROBJ1;SAY Il est trés gardé.;EXIT
  223. /*
  224. /* Action 7 - Close
  225. /* ================
  226. /*
  227. /*
  228. /* Action 8 - Look at
  229. /* ==================
  230. /*
  231. ACTION: 8;MOBJ
  232. ACTION: 8;IFOBJ ROBJ1;SAY C'est un bateau qui me serait trés utile.;W 50;SAY Mais ce n'est pas le MIEN.;EXIT
  233. ACTION: 8;IFOBJ ROBJ2;SAY Le Nord... là où je vis.;SAY Mais c'est à un bout de chemin à travers les océans...;SAY ...et encore plus loin pour la Suede!;EXIT
  234. ACTION: 8;IFOBJ ROBJ3;SAY Ca dit: "Chez Ali - Appats pour poisson et magasin hors-taxe".;EXIT
  235. ACTION: 8;IFOBJ ROBJ4;SAY Ca dit: "Tout pour le voyageur intelligent"!;EXIT
  236. ACTION: 8;IFOBJ ROBJ6;SAY Hmm... On dirait qu'il se passe des trucs speciaux dans ce magasin!;EXIT
  237. ACTION: 8;IFOBJ 15;SAY On dirait qu'il jette un oeil sur tout.;MOBJ;SAY Et il a un joli chapeau.;EXIT
  238. ACTION: 8;IFOBJ 21;IFRF 1=0;SAY Je ne peux pas examiner ca tant que ce monstre de mouette est assis là!;EXIT
  239. ACTION: 8;IFOBJ ROBJ5;IFRF 1=0;SAY Je ne m'approcherait pas de cette mouette sans une sorte d'arme...;SAY ...il me semble vraiment trés vicieux!;EXIT
  240. ACTION: 8;IFOBJ ROBJ5;IFRF 1=1;SAY Il semble bien...de loin.;EXIT
  241. /*
  242. /* Action 9 - Pull
  243. /* ===============
  244. /*
  245. ACTION: 9;IFOBJ 14;IFOF 1=0;MOBJ 14;HANDLE;W 30;HANDLE -1;SAY Ca ne change rien. Il est toujours accroché au crochets.;EXIT
  246. ACTION: 9;IFOBJ 14;VERB 2;REDO
  247. /* End of room file.
  248.